ggplot point shape

25가지 유형의 point shape
df2<-data.frame(x=1:5, y=1:25, z=1:25)
s<-ggplot(df2, aes(x=x, y=y))
s+geom_point(aes(shape=z), size=4)+scale_shape_identity()